Faster: Ways To Speed Up R Code - Part 1